home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 52
/
Aminet 52 (2002)(GTI - Schatztruhe)[!][Dec 2002].iso
/
Aminet
/
dev
/
lang
/
amigatalk.lha
/
prelude
/
False.p
< prev
next >
Wrap
Text File
|
2002-01-10
|
677b
|
28 lines
pTempVar <- <primitive 110 5 >
<primitive 112 pTempVar 1 " not " \
#( #[ 16r5B 16rF3 16rF5] \
#( )) >
<primitive 112 pTempVar 2 " ifFalse: " \
#( #[ 16r21 16rA5 16rF3 16rF5] \
#( )) >
<primitive 112 pTempVar 3 " ifTrue: " \
#( #[ 16r5D 16rF3 16rF5] \
#( )) >
<primitive 112 pTempVar 4 " ifFalse:ifTrue: " \
#( #[ 16r21 16rA5 16rF3 16rF5] \
#( )) >
<primitive 112 pTempVar 5 " ifTrue:ifFalse: " \
#( #[ 16r22 16rA5 16rF3 16rF5] \
#( )) >
<primitive 98 #False \
<primitive 97 #False #Boolean #AmigaTalk:General/False.st \
#( ) \
#( #not #ifFalse: #ifTrue: #ifFalse:ifTrue: #ifTrue:ifFalse: ) \
pTempVar 3 2 > #ordinary >